home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 5 / CD-ROM Today - The Disc (Issue 5)(November 1994).ISO / mac / DHA demo / Don Norman Folder / The Library / The Library.rsrc / CSTR_19767_UMCSTR < prev    next >
Encoding:
Text File  |  1994-09-21  |  941 b   |  23 lines
  1. put tStr("LibMsg",40) into bn
  2. put tStr("LibMsg",50) into umin
  3. put not checked(umin) into s
  4. check umin, s
  5. if s then
  6. put tStr("LibMsg",52) after menuitem umin of menu bn
  7. put tStr("LibMsg",51) after menuitem umin of menu bn
  8. put tStr("LibMsg",53) after menuitem umin of menu bn
  9. set menumsg of menuitem tStr("LibMsg",52) of menu bn to "doCSTR" & quote & "saveStateCSTR" & quote
  10. set menumsg of menuitem tStr("LibMsg",51) of menu bn to "doCSTR"& quote & "restoreStateCSTR" & quote
  11. set menumsg of menuitem tStr("LibMsg",53) of menu bn to "doCSTR" & quote &"delFindCSTR" & quote
  12. send updateUMState to this card
  13. else
  14. if there is a menuitem tStr("LibMsg",52) of menu bn then
  15. delete menuitem tStr("LibMsg",52) of menu bn
  16. end if
  17. if there is a menuitem tStr("LibMsg",51) of menu bn then
  18. delete menuitem tStr("LibMsg",51) of menu bn
  19. end if
  20. if there is a menuitem tStr("LibMsg",53) of menu bn then
  21. delete menuitem tStr("LibMsg",53) of menu bn
  22. end if
  23. end if